home *** CD-ROM | disk | FTP | other *** search
/ Shocking The Web CD-ROM / SHOCK_CD.ISO / mac / Chapter Tutorials / DevGallery / ISYS / Source / MEMOREX1.DIR / 00017.ls < prev    next >
Encoding:
Text File  |  1996-05-10  |  127 b   |  11 lines
  1. on mouseDown
  2.   puppetSound("Laser")
  3. end
  4.  
  5. on mouseUp
  6.   repeat while soundBusy(1)
  7.     go(the frame)
  8.   end repeat
  9.   go(#next)
  10. end
  11.